home *** CD-ROM | disk | FTP | other *** search
/ Delphi Magazine Collection 2001 / Delphi Magazine Collection 20001 (2001).iso / DISKS / ISSUE13 / TIPTRIX / LISTING2.PAS next >
Encoding:
Pascal/Delphi Source File  |  1996-08-20  |  399 b   |  26 lines
  1. unit Unit1;
  2.  
  3. interface
  4. { Your code }
  5.  
  6. implementation
  7. {  more code }
  8.  
  9. procedure MyInitProc;
  10. begin
  11. end;
  12.  
  13. procedure MyCleanupProc;
  14. begin
  15. end;
  16.  
  17. initialization
  18.   {Any amount of code can go here, but
  19.    calling a procedure looks neater, eg :}
  20.   MyInitProc;
  21. finalization
  22.   {Any amount of code can go here too, but
  23.    calling a procedure looks neater, eg :}
  24.   MyCleanupProc;
  25. end.
  26. x